| / TeX 1995 July
/ TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / plain / contrib / fortran.tex
| < prev | next > |
| LaTeX Document | 1992-08-26 | 1.6 KB |
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text| Confidence | Program | Detection | Match Type | Support |
|---|---|---|---|---|
| 100% | dexvert | LaTeX Document (document/latex) | magic | Supported |
| 100% | dexvert | Texinfo Document (document/texInfo) | magic | Supported |
| 1% | dexvert | Corel 10 Texture (image/corel10Texture) | ext | Unsupported |
| 1% | dexvert | Croteam texture file (image/croteamTextureFile) | ext | Unsupported |
| 1% | dexvert | Text File (text/txt) | fallback | Supported |
| 100% | file | TeX document text | default | |
| 99% | file | LaTeX document text | default | |
| 98% | file | LaTeX auxiliary file, ASCII text | default | |
| 100% | checkBytes | Printable ASCII | default | |
| 100% | perlTextCheck | Likely Text (Perl) | default | |
| 100% | detectItEasy | Format: plain text[LF] | default (weak) | |
| 100% | xdgMime | text/x-matlab | default (weak) |
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 25 25 25 2d 2d 2d 43 75 | 74 20 48 65 72 65 2d 2d |%%%---Cu|t Here--|
|00000010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000040| 2d 2d 2d 2d 2d 2d 0a 25 | 25 25 20 46 69 6c 65 3a |------.%|%% File:|
|00000050| 20 46 6f 72 74 72 61 6e | 2e 54 65 58 0a 25 20 54 | Fortran|.TeX.% T|
|00000060| 68 69 73 20 69 73 20 61 | 20 66 69 6c 65 20 6f 66 |his is a| file of|
|00000070| 20 63 6f 6d 6d 61 6e 64 | 73 20 66 6f 72 20 70 72 | command|s for pr|
|00000080| 69 6e 74 69 6e 67 20 6f | 75 74 20 70 72 6f 67 72 |inting o|ut progr|
|00000090| 61 6d 73 20 75 73 69 6e | 67 20 54 65 58 0a 25 20 |ams usin|g TeX.% |
|000000a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000000b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 2d 2d | | --|
|000000c0| 20 73 65 65 20 44 49 52 | 54 59 20 54 52 49 43 4b | see DIR|TY TRICK|
|000000d0| 53 20 69 6e 20 54 65 58 | 62 6f 6f 6b 0a 25 0a 25 |S in TeX|book.%.%|
|000000e0| 20 20 20 20 20 20 20 54 | 68 69 73 20 76 65 72 73 | T|his vers|
|000000f0| 69 6f 6e 20 69 73 20 64 | 65 73 69 67 6e 65 64 20 |ion is d|esigned |
|00000100| 74 6f 20 70 72 69 6e 74 | 20 73 6f 75 72 63 65 20 |to print| source |
|00000110| 63 6f 64 65 20 61 74 20 | 39 20 70 6f 69 6e 74 0a |code at |9 point.|
|00000120| 25 20 20 20 20 20 20 20 | 66 69 74 74 69 6e 67 20 |% |fitting |
|00000130| 61 6e 20 38 30 20 63 6f | 6c 75 6d 6e 20 6c 69 6e |an 80 co|lumn lin|
|00000140| 65 20 69 6e 74 6f 20 61 | 20 36 20 74 72 75 65 20 |e into a| 6 true |
|00000150| 69 6e 63 68 20 77 69 64 | 74 68 20 77 69 74 68 0a |inch wid|th with.|
|00000160| 25 20 20 20 20 20 20 20 | 38 20 70 6f 69 6e 74 20 |% |8 point |
|00000170| 6c 69 6e 65 20 6e 75 6d | 62 65 72 73 20 62 65 66 |line num|bers bef|
|00000180| 6f 72 65 20 65 61 63 68 | 20 6c 69 6e 65 2e 0a 25 |ore each| line..%|
|00000190| 20 20 20 20 20 20 20 49 | 74 20 68 61 6e 64 6c 65 | I|t handle|
|000001a0| 73 20 54 41 42 20 28 5e | 49 29 20 63 68 61 72 61 |s TAB (^|I) chara|
|000001b0| 63 74 65 72 73 20 61 6c | 6d 6f 73 74 20 74 68 65 |cters al|most the|
|000001c0| 20 73 61 6d 65 20 61 73 | 20 44 45 43 0a 25 0a 25 | same as| DEC.%.%|
|000001d0| 20 20 20 20 20 20 20 75 | 73 61 67 65 3a 0a 25 20 | u|sage:.% |
|000001e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 5c 69 | | \i|
|000001f0| 6e 70 75 74 20 66 6f 72 | 74 72 61 6e 20 20 20 20 |nput for|tran |
|00000200| 20 20 20 20 20 20 25 20 | 70 75 74 20 74 68 69 73 | % |put this|
|00000210| 20 65 61 72 6c 79 20 69 | 6e 20 74 68 65 20 66 69 | early i|n the fi|
|00000220| 6c 65 0a 25 20 20 20 20 | 20 20 20 20 20 20 20 20 |le.% | |
|00000230| 20 20 20 5c 6c 69 73 74 | 69 6e 67 7b 66 69 6c 65 | \list|ing{file|
|00000240| 2e 65 78 74 7d 20 20 20 | 20 20 20 25 20 75 73 65 |.ext} | % use|
|00000250| 20 64 65 76 3a 5b 64 69 | 72 5d 20 69 66 20 79 6f | dev:[di|r] if yo|
|00000260| 75 20 77 69 73 68 0a 25 | 0a 25 20 20 20 20 20 20 |u wish.%|.% |
|00000270| 20 42 2e 48 2e 20 54 6f | 62 79 20 20 38 2f 38 36 | B.H. To|by 8/86|
|00000280| 0a 25 0a 5c 6e 65 77 63 | 6f 75 6e 74 5c 6c 69 6e |.%.\newc|ount\lin|
|00000290| 65 6e 6f 0a 5c 66 6f 6e | 74 5c 41 6c 69 73 74 74 |eno.\fon|t\Alistt|
|000002a0| 74 3d 63 6d 74 74 39 20 | 61 74 20 39 20 74 72 75 |t=cmtt9 |at 9 tru|
|000002b0| 65 70 74 0a 5c 66 6f 6e | 74 5c 41 6c 69 73 74 72 |ept.\fon|t\Alistr|
|000002c0| 6d 3d 63 6d 72 38 20 61 | 74 20 38 20 74 72 75 65 |m=cmr8 a|t 8 true|
|000002d0| 70 74 0a 5c 64 65 66 5c | 75 6e 63 61 74 63 6f 64 |pt.\def\|uncatcod|
|000002e0| 65 73 70 65 63 69 61 6c | 73 7b 5c 64 65 66 5c 64 |especial|s{\def\d|
|000002f0| 6f 23 23 31 7b 5c 63 61 | 74 63 6f 64 65 60 23 23 |o##1{\ca|tcode`##|
|00000300| 31 3d 31 32 20 7d 5c 64 | 6f 73 70 65 63 69 61 6c |1=12 }\d|ospecial|
|00000310| 73 7d 0a 5c 64 65 66 5c | 6c 69 73 74 69 6e 67 23 |s}.\def\|listing#|
|00000320| 31 7b 5c 70 61 72 5c 62 | 65 67 69 6e 67 72 6f 75 |1{\par\b|egingrou|
|00000330| 70 5c 73 65 74 75 70 76 | 65 72 62 61 74 69 6d 5c |p\setupv|erbatim\|
|00000340| 69 6e 70 75 74 23 31 20 | 5c 65 6e 64 67 72 6f 75 |input#1 |\endgrou|
|00000350| 70 7d 0a 5c 64 65 66 5c | 73 65 74 75 70 76 65 72 |p}.\def\|setupver|
|00000360| 62 61 74 69 6d 7b 0a 20 | 20 5c 41 6c 69 73 74 74 |batim{. | \Alistt|
|00000370| 74 5c 62 61 73 65 6c 69 | 6e 65 73 6b 69 70 3d 20 |t\baseli|neskip= |
|00000380| 38 2e 35 74 72 75 65 70 | 74 5c 6c 69 6e 65 73 6b |8.5truep|t\linesk|
|00000390| 69 70 3d 31 74 72 75 65 | 70 74 0a 20 20 5c 6c 69 |ip=1true|pt. \li|
|000003a0| 6e 65 73 6b 69 70 6c 69 | 6d 69 74 3d 31 74 72 75 |neskipli|mit=1tru|
|000003b0| 65 70 74 5c 74 6f 70 73 | 6b 69 70 3d 30 70 74 0a |ept\tops|kip=0pt.|
|000003c0| 20 20 5c 6c 69 6e 65 6e | 6f 3d 30 0a 20 20 5c 64 | \linen|o=0. \d|
|000003d0| 65 66 5c 70 61 72 7b 5c | 6c 65 61 76 65 76 6d 6f |ef\par{\|leavevmo|
|000003e0| 64 65 5c 65 67 72 6f 75 | 70 5c 62 6f 78 30 5c 65 |de\egrou|p\box0\e|
|000003f0| 6e 64 67 72 61 66 7d 0a | 20 20 5c 6f 62 65 79 6c |ndgraf}.| \obeyl|
|00000400| 69 6e 65 73 20 5c 75 6e | 63 61 74 63 6f 64 65 73 |ines \un|catcodes|
|00000410| 70 65 63 69 61 6c 73 20 | 5c 6f 62 65 79 73 70 61 |pecials |\obeyspa|
|00000420| 63 65 73 0a 20 20 5c 63 | 61 74 63 6f 64 65 60 5c |ces. \c|atcode`\|
|00000430| 60 3d 5c 61 63 74 69 76 | 65 20 5c 63 61 74 63 6f |`=\activ|e \catco|
|00000440| 64 65 60 5c 5e 5e 49 3d | 5c 61 63 74 69 76 65 0a |de`\^^I=|\active.|
|00000450| 20 20 5c 65 76 65 72 79 | 70 61 72 7b 5c 61 64 76 | \every|par{\adv|
|00000460| 61 6e 63 65 5c 6c 69 6e | 65 6e 6f 20 62 79 31 0a |ance\lin|eno by1.|
|00000470| 20 20 20 20 5c 6c 6c 61 | 70 7b 5c 41 6c 69 73 74 | \lla|p{\Alist|
|00000480| 72 6d 5c 74 68 65 5c 6c | 69 6e 65 6e 6f 5c 20 5c |rm\the\l|ineno\ \|
|00000490| 20 7d 5c 73 74 61 72 74 | 62 6f 78 7d 7d 0a 5c 6e | }\start|box}}.\n|
|000004a0| 65 77 64 69 6d 65 6e 5c | 77 20 5c 73 65 74 62 6f |ewdimen\|w \setbo|
|000004b0| 78 30 3d 5c 68 62 6f 78 | 7b 5c 41 6c 69 73 74 74 |x0=\hbox|{\Alistt|
|000004c0| 74 5c 73 70 61 63 65 7d | 20 5c 77 3d 38 5c 77 64 |t\space}| \w=8\wd|
|000004d0| 30 0a 5c 64 65 66 5c 73 | 74 61 72 74 62 6f 78 7b |0.\def\s|tartbox{|
|000004e0| 5c 73 65 74 62 6f 78 30 | 3d 5c 68 62 6f 78 5c 62 |\setbox0|=\hbox\b|
|000004f0| 67 72 6f 75 70 7d 0a 7b | 5c 63 61 74 63 6f 64 65 |group}.{|\catcode|
|00000500| 60 5c 5e 5e 49 3d 5c 61 | 63 74 69 76 65 0a 20 20 |`\^^I=\a|ctive. |
|00000510| 5c 67 64 65 66 5e 5e 49 | 7b 5c 6c 65 61 76 65 76 |\gdef^^I|{\leavev|
|00000520| 6d 6f 64 65 5c 65 67 72 | 6f 75 70 0a 20 20 20 20 |mode\egr|oup. |
|00000530| 5c 64 69 6d 65 6e 30 3d | 5c 77 64 30 0a 20 20 20 |\dimen0=|\wd0. |
|00000540| 20 5c 64 69 76 69 64 65 | 5c 64 69 6d 65 6e 30 20 | \divide|\dimen0 |
|00000550| 62 79 5c 77 0a 20 20 20 | 20 5c 6d 75 6c 74 69 70 |by\w. | \multip|
|00000560| 6c 79 5c 64 69 6d 65 6e | 30 20 62 79 5c 77 0a 20 |ly\dimen|0 by\w. |
|00000570| 20 20 20 5c 61 64 76 61 | 6e 63 65 5c 64 69 6d 65 | \adva|nce\dime|
|00000580| 6e 30 20 62 79 5c 77 0a | 20 20 20 20 5c 77 64 30 |n0 by\w.| \wd0|
|00000590| 3d 5c 64 69 6d 65 6e 30 | 20 5c 62 6f 78 30 20 5c |=\dimen0| \box0 \|
|000005a0| 73 74 61 72 74 62 6f 78 | 7d 7d 0a 7b 5c 6f 62 65 |startbox|}}.{\obe|
|000005b0| 79 73 70 61 63 65 73 5c | 67 6c 6f 62 61 6c 5c 6c |yspaces\|global\l|
|000005c0| 65 74 20 3d 5c 20 7d 0a | 7b 5c 63 61 74 63 6f 64 |et =\ }.|{\catcod|
|000005d0| 65 60 5c 60 3d 5c 61 63 | 74 69 76 65 20 5c 67 64 |e`\`=\ac|tive \gd|
|000005e0| 65 66 60 7b 5c 72 65 6c | 61 78 5c 6c 71 7d 7d 0a |ef`{\rel|ax\lq}}.|
|000005f0| 25 25 25 2d 2d 2d 43 75 | 74 20 48 65 72 65 2d 2d |%%%---Cu|t Here--|
|00000600| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000610| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000620| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000630| 2d 2d 2d 2d 2d 2d 0a | |------. | |
+--------+-------------------------+-------------------------+--------+--------+